List MakeEmpty()
{
    List L;
    L = (List)malloc(sizeof(List));//  
    L->Last = -1;
    return L;
}
Position Find(List L, ElementType X)
{
    int i;
    for (i = 0; i <= L->Last; i++)
    {
        if (X == L->Data[i]);
        return i;
    }
    return ERROR;
}
bool Insert(List L, ElementType X, Position P)
{
    if (L->Last == MAXSIZE - 1)
    {
        printf("FULL");
        return false;
    }
    if (P<1 || P>L->Last + 1)
    {
        printf("ILLEGAL POSITION");
        return false;
    }
    int i;
    for (i = L->Last; i >= P; i--)
    {
        L->Data[i + 1] = L->Data[i];
    }
    L->Data[P] = X;
    L->Last++;
    return true;
}
bool Delete(List L, Position P)
{
    if (P > L->Last || P < 1)
    {
        printf("POSITION %d EMPTY",P);
        return false;
    }
    int i;
    for (i = P; i < L->Last; i++)
        L->Data[i] = L->Data[i + 1];
    L->Last--;
    return true;
}